CAASun_EquatorialRectangularCoordinatesMeanEquinox <-
function(JD){
.Call("CAASun_EquatorialRectangularCoordinatesMeanEquinox", JD)
}
